This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
It is very straightforward...
'reading from note, creating docNotice, populate fields, then send
Dim body As NotesRichTextItem
Dim bodyOriginal as Variant
Set bodyOriginal=note.getFirstItem("DspBody") 'DspBody is a richtext field in the open UI document, containing text and attachments
Set docNotice=dbCurrent.createDocument
docNotice.form="Notice"
...populate some fields like SendTo, Subject,StartDateTime, EndDateTime etc
Set body = New NotesRichTextItem( docNotice, "Body" )
Call body.AddNewline(1)
Call body.AppendRTItem(bodyOriginal)
Call body.AddNewline(1)
Call docNotice.Send(False)
Like I said, in every case EXCEPT R8.5 (including other clients like Outlook, Google) the attachment is visible.
If you can assist, I will be very glad - waiting for Product Support will kill this project (and maybe me).
Feedback response number WEBB8829RK created by ~James Preresasternivu on 08/05/2010
some code
Return to top
. . some code (~James Preresas... 5.Aug.10) 
